commandArgs = "stock_ss.csv"
source("scripts2/stock_scan.R");
commandArgs = "stock_sz.csv"
source("scripts2/stock_scan.R");
commandArgs = "stock_st.csv"
source("scripts2/stock_scan.R");

source("scripts2/stock_scan_sell.R")

perf = read.csv("hold_list.txt", head=T)
num_of_record = length(perf$Profit);
num_of_positive = length(which(perf$Profit > 0))
num_of_negtive = length(which(perf$Profit < 0))

print( paste("Hold stock: ", num_of_record, 
             ", positive: ", num_of_positive, 
             ", negtive: ", num_of_negtive)
      );